fu! ReplaceStuff()
    let curr_line = getline('.')
    let curr_line = substitute(curr_line, ' \+', ' ', 'g')
    let curr_line = substitute(curr_line, '\[ t', '[t', 'g')
    let curr_line = substitute(curr_line, '\[ v', '[v', 'g')

    let curr_line = substitute(curr_line, 'Pi', 'pi', 'g')
    let curr_line = substitute(curr_line, '\\\[Capitalpi\]', 'Pi', 'g')

    let curr_line = substitute(curr_line, 'Derivative\[0, 1, 0\]\[T\]', 'dxT', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[0, 0, 1\]\[T\]', 'dyT', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[1, 0, 0\]\[T\]', 'dtT', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[1, 1, 0\]\[T\]', 'dxdtT', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[1, 0, 1\]\[T\]', 'dydtT', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[0, 2, 0\]\[T\]', 'dxdxT', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[0, 1, 1\]\[T\]', 'dxdyT', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[0, 0, 2\]\[T\]', 'dydyT', 'g')

    let curr_line = substitute(curr_line, 'Derivative\[0, 1, 0\]\[B\]', 'dxB', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[0, 0, 1\]\[B\]', 'dyB', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[0, 1, 0\]\[Pi\]', 'dxPi', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[0, 0, 1\]\[Pi\]', 'dyPi', 'g')


    let curr_line = substitute(curr_line, 'Derivative\[0, 1, 0\]\[vx\]', 'dxvx', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[0, 0, 1\]\[vx\]', 'dyvx', 'g')

    let curr_line = substitute(curr_line, 'Derivative\[0, 1, 0\]\[vy\]', 'dxvy', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[0, 0, 1\]\[vy\]', 'dyvy', 'g')

    let curr_line = substitute(curr_line, 'Derivative\[0, 2, 0\]\[vx\]', 'dxdxvx', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[0, 1, 1\]\[vx\]', 'dxdyvx', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[0, 0, 2\]\[vx\]', 'dydyvx', 'g')

    let curr_line = substitute(curr_line, 'Derivative\[0, 2, 0\]\[vy\]', 'dxdxvy', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[0, 1, 1\]\[vy\]', 'dxdyvy', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[0, 0, 2\]\[vy\]', 'dydyvy', 'g')

    let curr_line = substitute(curr_line, 'Derivative\[1, 0, 0\]\[vx\]', 'px', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[1, 0, 0\]\[vy\]', 'py', 'g')

    let curr_line = substitute(curr_line, 'Derivative\[1, 1, 0\]\[vx\]', 'dxpx', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[1, 0, 1\]\[vx\]', 'dypx', 'g')

    let curr_line = substitute(curr_line, 'Derivative\[1, 1, 0\]\[vy\]', 'dxpy', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[1, 0, 1\]\[vy\]', 'dypy', 'g')

    let curr_line = substitute(curr_line, 'Derivative\[2, 0, 0\]\[vx\]', 'dtdtvx', 'g')
    let curr_line = substitute(curr_line, 'Derivative\[2, 0, 0\]\[vy\]', 'dtdtvy', 'g')
    let curr_line = substitute(curr_line, '\[t, x, y\]', '', 'g')

    let curr_line = substitute(curr_line, '\*', '.*', 'g')
    let curr_line = substitute(curr_line, '\^', '.^', 'g')
    let curr_line = substitute(curr_line, '\/', '.\/', 'g')

    call setline('.', curr_line)
endf

